//
//  GpsManager.m
//  cwz_Business
//
//  Created by ZhangBinbin on 16/1/13.
//  Copyright © 2016年 DAZE. All rights reserved.
//

#import "GpsManager.h"
#import <CoreLocation/CoreLocation.h>
#import <UIKit/UIKit.h>

#define SetUserDefaults(id,key) [[NSUserDefaults standardUserDefaults] setObject:id forKey:key]; [[NSUserDefaults standardUserDefaults] synchronize];
#define GetUserDefaults(key)    [[NSUserDefaults standardUserDefaults] objectForKey:key];

static const double a   = 6378245.0;
static const double ee  = 0.00669342162296594323;
static const double pi  = 3.14159265358979324;
static const double xPi = M_PI  * 3000.0 / 180.0;

@implementation GpsManager {
    //是否定位过的标示符
    BOOL locationedFlag;
}

+ (id) sharedGpsManager {
    static id s;
    if (s == nil) {
        s = [[GpsManager alloc] init];
    }
    return s;
}
- (id)init {
    self = [super init];
    if (self) {
        // 打开定位 然后得到数据
        manager = [[CLLocationManager alloc] init];
        manager.delegate = self;
        manager.desiredAccuracy = kCLLocationAccuracyBest;
        
        // 兼容iOS8.0版本
        /* Info.plist里面加上2项
         NSLocationAlwaysUsageDescription      Boolean YES
         NSLocationWhenInUseUsageDescription   Boolean YES
         */
        
        // 请求授权 requestWhenInUseAuthorization用在>=iOS8.0上
        // respondsToSelector: 前面manager是否有后面requestWhenInUseAuthorization方法
        // 1. 适配 动态适配
        if ([manager respondsToSelector:@selector(requestWhenInUseAuthorization)]) {
            [manager requestWhenInUseAuthorization];
            [manager requestAlwaysAuthorization];
        }
        // 2. 另外一种适配 systemVersion 有可能是 8.1.1
        //float osVersion = [[[UIDevice currentDevice] systemVersion] floatValue];
        //if (osVersion >= 8) {
        //    [manager requestWhenInUseAuthorization];
        //    [manager requestAlwaysAuthorization];
        //}
        locationType = 0;
    }
    return self;
}
- (void) getGps:(GpsCallback)cb type:(kMapType)type getOnce:(BOOL)go{
    getOnce        = go;
    locationedFlag = NO;
    // 回调block 复制
    gpsCallBack     = [cb copy];


    if (type > 0) locationType = type;

    // 获取上一次的定位地址
    NSNumber * lat          = GetUserDefaults(LocLat);          lat          = (lat          ? lat          : @(-1));
    NSNumber * lng          = GetUserDefaults(LocLng);          lng          = (lng          ? lng          : @(-1));
    NSString * provinceName = GetUserDefaults(LocProvinceName); provinceName = (provinceName ? provinceName : @""  );
    NSString * cityName     = GetUserDefaults(LocCityName);     cityName     = (cityName     ? cityName     : @""  );
    NSString * detailAdd    = GetUserDefaults(LocDetailAdd);    detailAdd    = (detailAdd    ? detailAdd    : @""  );
    
    // 定位开始之前先返回上一次的定位
    if (gpsCallBack) gpsCallBack(lat.doubleValue, lng.doubleValue, provinceName, cityName, detailAdd, kLocationPrevious);
    
    // 停止上一次的
    [manager stopUpdatingLocation];
    
    // 定位不可用直接返回上一次的定位信息
    if ([CLLocationManager authorizationStatus] == kCLAuthorizationStatusDenied){
        if (gpsCallBack) gpsCallBack(lat.doubleValue, lng.doubleValue, provinceName, cityName, detailAdd, kLocationCurrent);
        return;
    }
    
    // 开始新的数据定位
    [manager startUpdatingLocation];
}

+ (void) getGps    :(GpsCallback)cb type:(kMapType)type {
    [[GpsManager sharedGpsManager] getGps:cb type:type getOnce:NO ];
}

+ (void) getOnceGps:(GpsCallback)cb type:(kMapType)type {
    // 只获取一次定位
    [[GpsManager sharedGpsManager] getGps:cb type:type getOnce:YES];
}

- (void) stop {
    [manager stopUpdatingLocation];
}

+ (void) stop {
    [[GpsManager sharedGpsManager] stop];
}

// 每隔一段时间就会调用
- (void)locationManager:(CLLocationManager *)manager didUpdateLocations:(NSArray *)locations {
    if (getOnce) {
        [self stop];
        if (locationedFlag) return;
    }
    [self callBack:locations];
}
- (void)locationManager:(CLLocationManager *)manager didFailWithError:(NSError *)error {
    //定位失败直接返回上次定位
    NSNumber * lat          = GetUserDefaults(LocLat);          lat          = (lat          ? lat          : @(-1));
    NSNumber * lng          = GetUserDefaults(LocLng);          lng          = (lng          ? lng          : @(-1));
    NSString * provinceName = GetUserDefaults(LocProvinceName); provinceName = (provinceName ? provinceName : @""  );
    NSString * cityName     = GetUserDefaults(LocCityName);     cityName     = (cityName     ? cityName     : @""  );
    NSString * detailAdd    = GetUserDefaults(LocDetailAdd);    detailAdd    = (detailAdd    ? detailAdd    : @""  );
    if (gpsCallBack) gpsCallBack(lat.doubleValue, lng.doubleValue, provinceName, cityName, detailAdd, kLocationCurrent);
}
- (void)callBack:(NSArray *)locations {
    CLLocation * loc                   = [locations lastObject];
    CLLocationCoordinate2D resutCoor   = loc.coordinate;
    
    switch (locationType) {
        case kNormal  :
            break;
        case kBaiDuMap:
            resutCoor = [GpsManager transformFromGCJToBaidu:[GpsManager transformFromWGSToGCJ:resutCoor]];
            break;
        case kABCMap  :
        case kSoSoMap :
        case kALiMap  :
            resutCoor = [GpsManager transformFromWGSToGCJ:resutCoor];
            break;
    }
    
    double lat = resutCoor.latitude;
    double lng = resutCoor.longitude;
    
    // 保存设备的现语言
    NSMutableArray *userDefaultLanguages = GetUserDefaults(@"AppleLanguages");
    // 本地化语言换成简体中文
    NSArray        *chinaLanguages       = @[@"zh-Hans",@"zh-Hans-CN"];
    SetUserDefaults(chinaLanguages,@"AppleLanguages");
    
    //定位城市通过CLGeocoder
    CLGeocoder * geoCoder = [[CLGeocoder alloc] init];
    [geoCoder reverseGeocodeLocation:loc completionHandler:^(NSArray *placemarks, NSError *error) {
        if (locationedFlag) {
            return ;
        }
        CLPlacemark * placemark = [placemarks firstObject];
        if (placemark) {
            NSDictionary * placemarkDict = placemark.addressDictionary;

            NSString     * provinceName  = nil;
            NSString     * cityName      = nil;
            NSString     * detailAdd     = nil;
            
            if([placemarkDict objectForKey:@"State"]                  != NULL) provinceName = [placemarkDict objectForKey:@"State"];

            if([placemarkDict objectForKey: @"City"]                  != NULL) cityName     = [placemarkDict objectForKey: @"City"];
            
            if([placemarkDict objectForKey: @"FormattedAddressLines"] != NULL) detailAdd    = [[placemarkDict objectForKey: @"FormattedAddressLines"] componentsJoinedByString: @", "];
            
            
            // 还原Device 的语言
            SetUserDefaults(userDefaultLanguages,@"AppleLanguages");
            
            // 保存定位的经纬度和城市名称
            SetUserDefaults(@(lat)      , LocLat         );
            SetUserDefaults(@(lng)      , LocLng         );
            SetUserDefaults(provinceName, LocProvinceName);
            SetUserDefaults(cityName    , LocCityName    );
            SetUserDefaults(detailAdd   , LocDetailAdd   );
            if (gpsCallBack) gpsCallBack(lat, lng, provinceName, cityName, detailAdd, kLocationCurrent);
            locationedFlag = YES;
        }
    }];
}

/**
 *  判断是不是在中国
 */
+(BOOL)isLocationOutOfChina:(CLLocationCoordinate2D)location
{
    if (location.longitude < 72.004 || location.longitude > 137.8347 || location.latitude < 0.8293 || location.latitude > 55.8271)
        return YES;
    return NO;
}

+(CLLocationCoordinate2D)transformFromWGSToGCJ:(CLLocationCoordinate2D)wgsLoc
{
    CLLocationCoordinate2D adjustLoc;
    if([self isLocationOutOfChina:wgsLoc])
    {
        adjustLoc = wgsLoc;
    }
    else
    {
        double adjustLat = [self transformLatWithX:wgsLoc.longitude - 105.0 withY:wgsLoc.latitude - 35.0];
        double adjustLon = [self transformLonWithX:wgsLoc.longitude - 105.0 withY:wgsLoc.latitude - 35.0];
        long double radLat = wgsLoc.latitude / 180.0 * pi;
        long double magic = sin(radLat);
        magic = 1 - ee * magic * magic;
        long double sqrtMagic = sqrt(magic);
        adjustLat = (adjustLat * 180.0) / ((a * (1 - ee)) / (magic * sqrtMagic) * pi);
        adjustLon = (adjustLon * 180.0) / (a / sqrtMagic * cos(radLat) * pi);
        adjustLoc.latitude = wgsLoc.latitude + adjustLat;
        adjustLoc.longitude = wgsLoc.longitude + adjustLon;
    }
    return adjustLoc;
}

+ (double)transformLatWithX:(double)x withY:(double)y
{
    double lat = -100.0 + 2.0 * x + 3.0 * y + 0.2 * y * y + 0.1 * x * y + 0.2 * sqrt(fabs(x));
    
    lat += (20.0 * sin(6.0 * x * pi) + 20.0 *sin(2.0 * x * pi)) * 2.0 / 3.0;
    lat += (20.0 * sin(y * pi) + 40.0 * sin(y / 3.0 * pi)) * 2.0 / 3.0;
    lat += (160.0 * sin(y / 12.0 * pi) + 320 * sin(y * pi / 30.0)) * 2.0 / 3.0;
    return lat;
}

+ (double)transformLonWithX:(double)x withY:(double)y
{
    double lon = 300.0 + x + 2.0 * y + 0.1 * x * x + 0.1 * x * y + 0.1 * sqrt(fabs(x));
    lon += (20.0 * sin(6.0 * x * pi) + 20.0 * sin(2.0 * x * pi)) * 2.0 / 3.0;
    lon += (20.0 * sin(x * pi) + 40.0 * sin(x / 3.0 * pi)) * 2.0 / 3.0;
    lon += (150.0 * sin(x / 12.0 * pi) + 300.0 * sin(x / 30.0 * pi)) * 2.0 / 3.0;
    return lon;
}

+(CLLocationCoordinate2D)transformFromGCJToBaidu:(CLLocationCoordinate2D)p
{
    long double z = sqrt(p.longitude * p.longitude + p.latitude * p.latitude) + 0.00002 * sqrt(p.latitude * pi);
    long double theta = atan2(p.latitude, p.longitude) + 0.000003 * cos(p.longitude * pi);
    CLLocationCoordinate2D geoPoint;
    geoPoint.latitude  = (z * sin(theta) + 0.006);
    geoPoint.longitude = (z * cos(theta) + 0.0065);
    return geoPoint;
}

+(CLLocationCoordinate2D)transformFromBaiduToGCJ:(CLLocationCoordinate2D)p
{
    double x = p.longitude - 0.0065, y = p.latitude - 0.006;
    double z = sqrt(x * x + y * y) - 0.00002 * sin(y * xPi);
    double theta = atan2(y, x) - 0.000003 * cos(x * xPi);
    CLLocationCoordinate2D geoPoint;
    geoPoint.latitude  = z * sin(theta);
    geoPoint.longitude = z * cos(theta);
    return geoPoint;
}

+(CLLocationCoordinate2D)transformFromGCJToWGS:(CLLocationCoordinate2D)p
{
    double threshold = 0.00001;
    
    // The boundary
    double minLat = p.latitude - 0.5;
    double maxLat = p.latitude + 0.5;
    double minLng = p.longitude - 0.5;
    double maxLng = p.longitude + 0.5;
    
    double delta = 1;
    int maxIteration = 30;
    // Binary search
    while(true)
    {
        CLLocationCoordinate2D leftBottom  = [[self class] transformFromWGSToGCJ:(CLLocationCoordinate2D){.latitude = minLat,.longitude = minLng}];
        CLLocationCoordinate2D rightBottom = [[self class] transformFromWGSToGCJ:(CLLocationCoordinate2D){.latitude = minLat,.longitude = maxLng}];
        CLLocationCoordinate2D leftUp      = [[self class] transformFromWGSToGCJ:(CLLocationCoordinate2D){.latitude = maxLat,.longitude = minLng}];
        CLLocationCoordinate2D midPoint    = [[self class] transformFromWGSToGCJ:(CLLocationCoordinate2D){.latitude = ((minLat + maxLat) / 2),.longitude = ((minLng + maxLng) / 2)}];
        delta = fabs(midPoint.latitude - p.latitude) + fabs(midPoint.longitude - p.longitude);
        
        if(maxIteration-- <= 0 || delta <= threshold)
        {
            return (CLLocationCoordinate2D){.latitude = ((minLat + maxLat) / 2),.longitude = ((minLng + maxLng) / 2)};
        }
        
        if(isContains(p, leftBottom, midPoint))
        {
            maxLat = (minLat + maxLat) / 2;
            maxLng = (minLng + maxLng) / 2;
        }
        else if(isContains(p, rightBottom, midPoint))
        {
            maxLat = (minLat + maxLat) / 2;
            minLng = (minLng + maxLng) / 2;
        }
        else if(isContains(p, leftUp, midPoint))
        {
            minLat = (minLat + maxLat) / 2;
            maxLng = (minLng + maxLng) / 2;
        }
        else
        {
            minLat = (minLat + maxLat) / 2;
            minLng = (minLng + maxLng) / 2;
        }
    }
    
}

static bool isContains(CLLocationCoordinate2D point, CLLocationCoordinate2D p1, CLLocationCoordinate2D p2)
{
    return (point.latitude >= MIN(p1.latitude, p2.latitude) && point.latitude <= MAX(p1.latitude, p2.latitude)) && (point.longitude >= MIN(p1.longitude,p2.longitude) && point.longitude <= MAX(p1.longitude, p2.longitude));
}



@end
